home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 20
/
Cream of the Crop 20 (Terry Blount) (1996).iso
/
program
/
pwrbat23.zip
/
QUOTES.PWR
< prev
next >
Wrap
Text File
|
1996-05-09
|
984b
|
24 lines
; This program shows a technique for supplying a quote character in a
; parameter string passed to another program. In this example we
; are passing parameters to the DOS utility FIND which requires that
; the string to be found be enclosed in quotes
Variable Quote,2,#034 ;define the quote character
Concat Quote,Quote,Quote ;this just keeps the .MAP file happy
Variable QChar,1,'' ;new single quote variable
MidString QChar,Quote,1,1 ;build the new variable
Variable FindStr,64 ;string to find
Variable FileName,64 ;in what file
Clear
Write 'Enter Find String '
ReadStr FindStr ;enter string to find
WriteLine ''
Write 'Enter File Name '
ReadStr FileName ;enter file name to look
WriteLine ''
Concat FindStr,QChar,FindStr,QChar
FIND FindStr,FileName ;execute FIND command
Write 'Press any key to continue'
ReadKey FindStr